home *** CD-ROM | disk | FTP | other *** search
/ Gekkan Dennou Club 147 / Gekkan Dennou Club - 2000.8 Vol. 147 (Japan).7z / Gekkan Dennou Club - 2000.8 Vol. 147 (Japan) (Track 1).bin / fdimg / oh!.2hd / OH!DEN_B.LZH / TOOLS / KEYWITCH / KW_S200.LZH / w24def.s < prev    next >
Text File  |  1995-03-20  |  10KB  |  428 lines
  1.     .data
  2.     .even
  3.  
  4. ********************************
  5. *コード変換テーブルの構造
  6. *    .ds.w    1    *データの長さ(偶数に切り上げ,$0000‥$7FFE)
  7. *    .ds.b    16    *押されていなければならないキー=1
  8. *    .ds.w    1    *ONでなければならないシフト=1
  9. *            *  bit7:NUMのLEDがON=1
  10. *            *  bit15:かなの配列が旧JIS=1
  11. *    .ds.l    1    *実行中でなければならないプログラム=1
  12. *            *  bit31:常に0
  13. *    .ds.b    16    *離されていなければならないキー=1
  14. *    .ds.w    1    *OFFでなければならないシフト=1
  15. *            *  bit7:NUMのLEDがOFF=1
  16. *            *  bit15:かなの配列が50音順=1
  17. *    .ds.l    1    *実行中であってはならないプログラム=1
  18. *            *  bit31:常に0
  19. *    .ds.b    1    *最初のデータのキーコード(=A),離されたときbit7=1
  20. *    .ds.b    1    *データ数(=B)
  21. *    .ds.b    1    *1つのデータのバイト数(=C)
  22. *    .ds.b    (B*C)    *キーデータの並び
  23. *            *  先頭が$FEならば未定義,$FEの後の余った部分は不定
  24. *            *  定義されているがデータが短くて余った部分は$FF
  25. *    .even
  26. *エンドコード
  27. *    .dc.w    -1
  28.  
  29. ********************************
  30. *プレフィクステーブル
  31. default_prefix_table::
  32.     .dc.w    -1
  33.  
  34. ********************************
  35. *キーコード変換テーブル
  36. default_assign_table::
  37. *キーコード(無条件,押したとき)
  38.     .dc.w    2f-1f
  39.     .dcb.b    18,0
  40.     .dc.l    0
  41.     .dcb.b    18,0
  42.     .dc.l    0
  43. 1:    .dc.b    $01,$74-$01+1,1
  44.     .dc.b        $01,$02,$03,$04,$05,$06,$07
  45.     .dc.b    $08,$09,$0A,$0B,$0C,$0D,$0E,$0F
  46.     .dc.b    $10,$11,$12,$13,$14,$15,$16,$17
  47.     .dc.b    $18,$19,$1A,$1B,$1C,$1D,$1E,$1F
  48.     .dc.b    $20,$21,$22,$23,$24,$25,$26,$27
  49.     .dc.b    $28,$29,$2A,$2B,$2C,$2D,$2E,$2F
  50.     .dc.b    $30,$31,$32,$33,$34,$35,$36,$37
  51.     .dc.b    $38,$39,$3A,$3B,$3C,$3D,$3E,$3F
  52.     .dc.b    $40,$41,$42,$43,$44,$45,$46,$47
  53.     .dc.b    $48,$49,$4A,$4B,$4C,$4D,$4E,$4F
  54.     .dc.b    $50,$51,$52,$53,$54,$55,$56,$57
  55.     .dc.b    $58,$59,$5A,$5B,$5C,$5D,$5E,$5F
  56.     .dc.b    $60,$61,$62,$63,$64,$65,$66,$67
  57.     .dc.b    $68,$69,$6A,$6B,$6C,$FE,$FE,$FE
  58.     .dc.b    $70,$71,$72,$73,$74
  59.     .even
  60. 2:
  61. *キーコード(無条件,離したとき)
  62.     .dc.w    2f-1f
  63.     .dcb.b    18,0
  64.     .dc.l    0
  65.     .dcb.b    18,0
  66.     .dc.l    0
  67. 1:    .dc.b    $80+$01,$74-$01+1,1
  68.     .dc.b        $81,$82,$83,$84,$85,$86,$87
  69.     .dc.b    $88,$89,$8A,$8B,$8C,$8D,$8E,$8F
  70.     .dc.b    $90,$91,$92,$93,$94,$95,$96,$97
  71.     .dc.b    $98,$99,$9A,$9B,$9C,$9D,$9E,$9F
  72.     .dc.b    $A0,$A1,$A2,$A3,$A4,$A5,$A6,$A7
  73.     .dc.b    $A8,$A9,$AA,$AB,$AC,$AD,$AE,$AF
  74.     .dc.b    $B0,$B1,$B2,$B3,$B4,$B5,$B6,$B7
  75.     .dc.b    $B8,$B9,$BA,$BB,$BC,$BD,$BE,$BF
  76.     .dc.b    $C0,$C1,$C2,$C3,$C4,$C5,$C6,$C7
  77.     .dc.b    $C8,$C9,$CA,$CB,$CC,$CD,$CE,$CF
  78.     .dc.b    $D0,$D1,$D2,$D3,$D4,$D5,$D6,$D7
  79.     .dc.b    $D8,$D9,$DA,$DB,$DC,$DD,$DE,$DF
  80.     .dc.b    $E0,$E1,$E2,$E3,$E4,$E5,$E6,$E7
  81.     .dc.b    $E8,$E9,$EA,$EB,$EC,$FE,$FE,$FE
  82.     .dc.b    $F0,$F1,$F2,$F3,$F4
  83.     .even
  84. 2:
  85. *キーコード変換テーブル終わり
  86.     .dc.w    -1
  87.  
  88. ********************************
  89. *サフィクステーブル
  90. default_suffix_table::
  91.     .dc.w    -1
  92.  
  93. ********************************
  94. *文字コード変換テーブル
  95. default_char_table::
  96. *文字コード(無条件)
  97.     .dc.w    2f-1f
  98.     .dcb.b    18,0
  99.     .dc.l    0
  100.     .dcb.b    18,0
  101.     .dc.l    0
  102. 1:    .dc.b    $01,$74-$01+1,1
  103.     .dc.b        $1B,$FE,$FE,$FE,$FE,$FE,$FE
  104.     .dc.b    $FE,$FE,$FE,$FE,$FE,$FE,$FE,$08
  105.     .dc.b    $09,$FE,$FE,$FE,$FE,$FE,$FE,$FE
  106.     .dc.b    $FE,$FE,$FE,$FE,$FE,$0D,$FE,$FE
  107.     .dc.b    $FE,$FE,$FE,$FE,$FE,$FE,$FE,$FE
  108.     .dc.b    $FE,$FE,$FE,$FE,$FE,$FE,$FE,$FE
  109.     .dc.b    $FE,$FE,$FE,$FE,$FE,' ',$00,$00
  110.     .dc.b    $00,$00,$00,$00,$00,$00,$00,$00
  111.     .dc.b    '/','*','-','7','8','9','+','4'
  112.     .dc.b    '5','6','=','1','2','3',$0D,'0'
  113.     .dc.b    ',','.',$00,$00,$00,$00,$00,$00
  114.     .dc.b    $00,$00,$00,$00,$00,$00,$00,$00
  115.     .dc.b    $00,$00,$00,$00,$00,$00,$00,$00
  116.     .dc.b    $00,$00,$00,$00,$00,$FE,$FE,$FE
  117.     .dc.b    $00,$00,$00,$00,$00
  118.     .even
  119. 2:
  120. *文字コード(CTRL=1)
  121.     .dc.w    2f-1f
  122.     .dcb.b    16,0
  123.     .dc.w    %00000000_00000010
  124.     .dc.l    0
  125.     .dcb.b    16,0
  126.     .dc.w    %00000000_00000000
  127.     .dc.l    0
  128. 1:    .dc.b    $02,$34-$02+1,1
  129.     .dc.b            $00,$00,$00,$00,$00,$00
  130.     .dc.b    $00,$00,$00,$00,$00,$1E,$1C,$FE
  131.     .dc.b    $FE,$11,$17,$05,$12,$14,$19,$15
  132.     .dc.b    $09,$0F,$10,$00,$1B,$FE,$01,$13
  133.     .dc.b    $04,$06,$07,$08,$0A,$0B,$0C,$00
  134.     .dc.b    $00,$1D,$1A,$18,$03,$16,$02,$0E
  135.     .dc.b    $0D,$00,$00,$00,$1F
  136.     .even
  137. 2:
  138. *文字コード(かな=0,ローマ字=0,CAPS=0,SHIFT=0,CTRL=0)
  139.     .dc.w    2f-1f
  140.     .dcb.b    16,0
  141.     .dc.w    %00000000_00000000
  142.     .dc.l    0
  143.     .dcb.b    16,0
  144.     .dc.w    %00001011_00000011
  145.     .dc.l    0
  146. 1:    .dc.b    $02,$34-$02+1,1
  147.     .dc.b            '1','2','3','4','5','6'
  148.     .dc.b    '7','8','9','0','-','^','\',$FE
  149.     .dc.b    $FE,'q','w','e','r','t','y','u'
  150.     .dc.b    'i','o','p','@','[',$FE,'a','s'
  151.     .dc.b    'd','f','g','h','j','k','l',';'
  152.     .dc.b    ':',']','z','x','c','v','b','n'
  153.     .dc.b    'm',',','.','/',$00
  154.     .even
  155. 2:
  156. *文字コード(かな=0,ローマ字=0,CAPS=0,SHIFT=1,CTRL=0)
  157.     .dc.w    2f-1f
  158.     .dcb.b    16,0
  159.     .dc.w    %00000000_00000001
  160.     .dc.l    0
  161.     .dcb.b    16,0
  162.     .dc.w    %00001011_00000010
  163.     .dc.l    0
  164. 1:    .dc.b    $02,$34-$02+1,1
  165.     .dc.b            '!','"','#','$','%','&'
  166.     .dc.b    $27,'(',')',$00,'=','~','|',$FE
  167.     .dc.b    $FE,'Q','W','E','R','T','Y','U'
  168.     .dc.b    'I','O','P','`','{',$FE,'A','S'
  169.     .dc.b    'D','F','G','H','J','K','L','+'
  170.     .dc.b    '*','}','Z','X','C','V','B','N'
  171.     .dc.b    'M','<','>','?','_'
  172.     .even
  173. 2:
  174. *文字コード(かな=0,ローマ字=0,CAPS=1,SHIFT=0,CTRL=0)
  175.     .dc.w    2f-1f
  176.     .dcb.b    16,0
  177.     .dc.w    %00001000_00000000
  178.     .dc.l    0
  179.     .dcb.b    16,0
  180.     .dc.w    %00000011_00000011
  181.     .dc.l    0
  182. 1:    .dc.b    $02,$34-$02+1,1
  183.     .dc.b            '1','2','3','4','5','6'
  184.     .dc.b    '7','8','9','0','-','^','\',$FE
  185.     .dc.b    $FE,'Q','W','E','R','T','Y','U'
  186.     .dc.b    'I','O','P','@','[',$FE,'A','S'
  187.     .dc.b    'D','F','G','H','J','K','L',';'
  188.     .dc.b    ':',']','Z','X','C','V','B','N'
  189.     .dc.b    'M',',','.','/',$00
  190.     .even
  191. 2:
  192. *文字コード(かな=0,ローマ字=0,CAPS=1,SHIFT=1,CTRL=0)
  193.     .dc.w    2f-1f
  194.     .dcb.b    16,0
  195.     .dc.w    %00001000_00000001
  196.     .dc.l    0
  197.     .dcb.b    16,0
  198.     .dc.w    %00000011_00000010
  199.     .dc.l    0
  200. 1:    .dc.b    $02,$34-$02+1,1
  201.     .dc.b            '!','"','#','$','%','&'
  202.     .dc.b    $27,'(',')',$00,'=','~','|',$FE
  203.     .dc.b    $FE,'q','w','e','r','t','y','u'
  204.     .dc.b    'i','o','p','`','{',$FE,'a','s'
  205.     .dc.b    'd','f','g','h','j','k','l','+'
  206.     .dc.b    '*','}','z','x','c','v','b','n'
  207.     .dc.b    'm','<','>','?','_'
  208.     .even
  209. 2:
  210. *文字コード(かな=0,ローマ字=1,SHIFT=0,CTRL=0)
  211.     .dc.w    2f-1f
  212.     .dcb.b    16,0
  213.     .dc.w    %00000010_00000000
  214.     .dc.l    0
  215.     .dcb.b    16,0
  216.     .dc.w    %00000001_00000011
  217.     .dc.l    0
  218. 1:    .dc.b    $02,$34-$02+1,1
  219.     .dc.b            '1','2','3','4','5','6'
  220.     .dc.b    '7','8','9','0','-','^','\',$FE
  221.     .dc.b    $FE,'Q','W','E','R','T','Y','U'
  222.     .dc.b    'I','O','P','@','[',$FE,'A','S'
  223.     .dc.b    'D','F','G','H','J','K','L',';'
  224.     .dc.b    ':',']','Z','X','C','V','B','N'
  225.     .dc.b    'M',',','.','/',$00
  226.     .even
  227. 2:
  228. *文字コード(かな=0,ローマ字=1,SHIFT=1,CTRL=0)
  229.     .dc.w    2f-1f
  230.     .dcb.b    16,0
  231.     .dc.w    %00000010_00000001
  232.     .dc.l    0
  233.     .dcb.b    16,0
  234.     .dc.w    %00000001_00000010
  235.     .dc.l    0
  236. 1:    .dc.b    $02,$34-$02+1,1
  237.     .dc.b            '!','"','#','$','%','&'
  238.     .dc.b    $27,'(',')',$00,'=','~','|',$FE
  239.     .dc.b    $FE,'q','w','e','r','t','y','u'
  240.     .dc.b    'i','o','p','`','{',$FE,'a','s'
  241.     .dc.b    'd','f','g','h','j','k','l','+'
  242.     .dc.b    '*','}','z','x','c','v','b','n'
  243.     .dc.b    'm','<','>','?','_'
  244.     .even
  245. 2:
  246. *文字コード(かな=1,あいう=0,SHIFT=0,CTRL=0)
  247.     .dc.w    2f-1f
  248.     .dcb.b    16,0
  249.     .dc.w    %00000001_00000000
  250.     .dc.l    0
  251.     .dcb.b    16,0
  252.     .dc.w    %10000000_00000011
  253.     .dc.l    0
  254. 1:    .dc.b    $02,$34-$02+1,1
  255.     .dc.b            'ﾇ','ﾌ','ｱ','ｳ','ｴ','ｵ'
  256.     .dc.b    'ﾔ','ﾕ','ﾖ','ﾜ','ﾎ','ﾍ','ｰ',$FE
  257.     .dc.b    $FE,'ﾀ','ﾃ','ｲ','ｽ','ｶ','ﾝ','ﾅ'
  258.     .dc.b    'ﾆ','ﾗ','ｾ','ﾞ','ﾟ',$FE,'ﾁ','ﾄ'
  259.     .dc.b    'ｼ','ﾊ','ｷ','ｸ','ﾏ','ﾉ','ﾘ','ﾚ'
  260.     .dc.b    'ｹ','ﾑ','ﾂ','ｻ','ｿ','ﾋ','ｺ','ﾐ'
  261.     .dc.b    'ﾓ','ﾈ','ﾙ','ﾒ','ﾛ'
  262.     .even
  263. 2:
  264. *文字コード(かな=1,あいう=0,SHIFT=1,CTRL=0)
  265.     .dc.w    2f-1f
  266.     .dcb.b    16,0
  267.     .dc.w    %00000001_00000001
  268.     .dc.l    0
  269.     .dcb.b    16,0
  270.     .dc.w    %10000000_00000010
  271.     .dc.l    0
  272. 1:    .dc.b    $02,$34-$02+1,1
  273.     .dc.b            'ﾇ','ﾌ','ｧ','ｩ','ｪ','ｫ'
  274.     .dc.b    'ｬ','ｭ','ｮ','ｦ','ﾎ','ﾍ','ｰ',$FE
  275.     .dc.b    $FE,'ﾀ','ﾃ','ｨ','ｽ','ｶ','ﾝ','ﾅ'
  276.     .dc.b    'ﾆ','ﾗ','ｾ','ﾞ','｢',$FE,'ﾁ','ﾄ'
  277.     .dc.b    'ｼ','ﾊ','ｷ','ｸ','ﾏ','ﾉ','ﾘ','ﾚ'
  278.     .dc.b    'ｹ','｣','ｯ','ｻ','ｿ','ﾋ','ｺ','ﾐ'
  279.     .dc.b    'ﾓ','､','｡','･',$A0
  280.     .even
  281. 2:
  282. *文字コード(かな=1,あいう=1,SHIFT=0,CTRL=0)
  283.     .dc.w    2f-1f
  284.     .dcb.b    16,0
  285.     .dc.w    %10000001_00000000
  286.     .dc.l    0
  287.     .dcb.b    16,0
  288.     .dc.w    %00000000_00000011
  289.     .dc.l    0
  290. 1:    .dc.b    $02,$34-$02+1,1
  291.     .dc.b            'ｱ','ｲ','ｳ','ｴ','ｵ','ﾅ'
  292.     .dc.b    'ﾆ','ﾇ','ﾈ','ﾉ','ﾗ','ﾘ','ﾙ',$FE
  293.     .dc.b    $FE,'ｶ','ｷ','ｸ','ｹ','ｺ','ﾊ','ﾋ'
  294.     .dc.b    'ﾌ','ﾍ','ﾎ','ﾚ','ﾛ',$FE,'ｻ','ｼ'
  295.     .dc.b    'ｽ','ｾ','ｿ','ﾏ','ﾐ','ﾑ','ﾒ','ﾓ'
  296.     .dc.b    'ﾞ','ﾟ','ﾀ','ﾁ','ﾂ','ﾃ','ﾄ','ﾔ'
  297.     .dc.b    'ﾕ','ﾖ','ﾜ','ｦ','ﾝ'
  298.     .even
  299. 2:
  300. *文字コード(かな=1,あいう=1,SHIFT=1,CTRL=0)
  301.     .dc.w    2f-1f
  302.     .dcb.b    16,0
  303.     .dc.w    %10000001_00000001
  304.     .dc.l    0
  305.     .dcb.b    16,0
  306.     .dc.w    %00000000_00000010
  307.     .dc.l    0
  308. 1:    .dc.b    $02,$34-$02+1,1
  309.     .dc.b            'ｧ','ｨ','ｩ','ｪ','ｫ','ﾅ'
  310.     .dc.b    'ﾆ','ﾇ','ﾈ','ｦ','ﾗ','ﾘ','ﾙ',$FE
  311.     .dc.b    $FE,'ｶ','ｷ','ｸ','ｹ','ｺ','ﾊ','ﾋ'
  312.     .dc.b    'ﾌ','ﾍ','ﾎ','ﾚ','｢',$FE,$A0,'ｼ'
  313.     .dc.b    'ｽ','ｾ','ｿ','ﾏ','ﾐ','ﾑ','ﾒ','ﾓ'
  314.     .dc.b    'ｰ','｣','ﾀ','ﾁ','ｯ','ﾃ','ﾄ','ｬ'
  315.     .dc.b    'ｭ','ｮ','､','｡','･'
  316.     .even
  317. 2:
  318. *文字コード変換テーブル終わり
  319.     .dc.w    -1
  320.  
  321. ********************************
  322. *メタキーのテーブル
  323. *  テーブルの構造
  324. *    .dc.w    2    *定数
  325. *    .ds.b    18    *押されていなければならないキー
  326. *    .ds.l    1    *使用するプログラム
  327. *    .ds.b    18    *離されていなければならないキー
  328. *    .ds.l    1    *使用しないプログラム
  329. *    .ds.b    1    *キーコード(0ならば押したキーのキーコードになる)
  330. *    .ds.b    1    *文字コード
  331. *  エンドコード
  332. *    .dc.w    -1
  333. default_meta_table::
  334.     .dc.w    -1
  335.  
  336. ********************************
  337. *プログラムのテーブル
  338. *  テーブルの構造
  339. *    .ds.b    24    *小文字化したファイル名(残りは0で埋める)
  340. *  エンドコード
  341. *    .dc.w    0
  342. default_prog_table::
  343.     .dc.w    0
  344.  
  345. ********************************
  346. *各種のイベントを発生するキーの設定
  347. *  テーブルの構造
  348. *    .dc.w    0    *定数
  349. *    .ds.b    18    *押されていなければならないキー
  350. *    .ds.l    1    *使用するプログラム
  351. *    .ds.b    18    *離されていなければならないキー
  352. *    .ds.l    1    *使用しないプログラム
  353. *  エンドコード
  354. *    .dc.w    -1
  355. *BREAKに必要なキー(BREAK)
  356. default_break_table::
  357.     .dc.w    0
  358.     .dcb.b    12,0
  359.     .dc.b    %00000010
  360.     .dcb.b    5,0
  361.     .dc.l    0
  362.     .dcb.b    16,0
  363.     .dc.w    %00000000_00000001
  364.     .dc.l    0
  365.     .dc.w    -1
  366. *コピーに必要なキー(COPY)
  367. default_copy_table::
  368.     .dc.w    0
  369.     .dcb.b    12,0
  370.     .dc.b    %00000100
  371.     .dcb.b    5,0
  372.     .dc.l    0
  373.     .dcb.b    18,0
  374.     .dc.l    0
  375.     .dc.w    -1
  376. *電卓のON/OFFキー(OPT.1+OPT.2)
  377. default_den_table::
  378.     .dc.w    0
  379.     .dcb.b    16,0
  380.     .dc.w    %00000000_00001100
  381.     .dc.l    0
  382.     .dcb.b    18,0
  383.     .dc.l    0
  384.     .dc.w    -1
  385. *Interruptに必要なキー
  386. default_int_table::
  387.     .dc.w    -1
  388. *禁止に必要なキー(SHIFT+CTRL+OPT.2)
  389. default_lock_table::
  390.     .dc.w    0
  391.     .dcb.b    16,0
  392.     .dc.w    %00000000_00001011
  393.     .dc.l    0
  394.     .dcb.b    18,0
  395.     .dc.l    0
  396.     .dc.w    -1
  397. *リセットに必要なキー(CTRL+OPT.1+DEL)
  398. default_reset_table::
  399.     .dc.w    0
  400.     .dcb.b    6,0
  401.     .dc.b    %10000000
  402.     .dcb.b    9,0
  403.     .dc.w    %00000000_00000110
  404.     .dc.l    0
  405.     .dcb.b    18,0
  406.     .dc.l    0
  407.     .dc.w    -1
  408. *SHIFT+BREAKに必要なキー(SHIFT+BREAK)
  409. default_sbreak_table::
  410.     .dc.w    0
  411.     .dcb.b    12,0
  412.     .dc.b    %00000010
  413.     .dcb.b    3,0
  414.     .dc.w    %00000000_00000001
  415.     .dc.l    0
  416.     .dcb.b    18,0
  417.     .dc.l    0
  418.     .dc.w    -1
  419. *解除に必要なキー(SHIFT+CTRL+OPT.2)
  420. default_unlock_table::
  421.     .dc.w    0
  422.     .dcb.b    16,0
  423.     .dc.w    %00000000_00001011
  424.     .dc.l    0
  425.     .dcb.b    18,0
  426.     .dc.l    0
  427.     .dc.w    -1
  428.